home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 October / Macworld (1998-10).dmg / Serious Demos / Morpha / 3DO.DXR / 00066_mess.ls < prev    next >
Encoding:
Text File  |  1998-07-31  |  199 b   |  12 lines
  1. on mouseUp
  2.   global label, s, sel, drums
  3.   set label to 2
  4.   puppetSound(1, 0)
  5.   mixdown2()
  6.   set s to random(10)
  7.   do("sel" & s + 10 & EMPTY)
  8.   set sel to s + 10
  9.   set drums to 0
  10.   go(marker(1))
  11. end
  12.